type blend_mode_ext =
  | GL_FUNC_ADD_EXT
  | GL_FUNC_SUBTRACT_EXT
  | GL_FUNC_REVERSE_SUBTRACT_EXT
  | GL_MIN_EXT
  | GL_MAX_EXT
  | GL_ALPHA_MIN_SGIX
  | GL_ALPHA_MAX_SGIX
  | GL_LOGIC_OP
